Объект History

Объект History

Объект History представляет собой массив документов, которые были открыты за сеанс работы. Таким образом, при помощи данного объекта можно обеспечить загрузку любой страницы, содержащейся в списке отрывавшихся документов. Свойство объекта Histiry приведен ниже.

Length. Возвращает количество элементов в массиве документов. Следует отметить, что нумерация элементов в данном массиве начинается с 1, в отличие от обычных массивов VBScript. Поэтому свойство Length возвращает реальное количество элементов, которое равно номеру последнего элемента в списке документов.

Листинг 1 позволяет создать HTML - страницу с кнопкой. При нажатии на эту кнопку должно отображаться число элементов в массиве открывавщихся документов.

Листинг 1. Работа с объектом History <html> <head> <title>Example</title> </head> <body bgcolor="white"> <script language="VBScript"> Sub TestB_OnClick Alert "History.Length =" +CStr(History.Length) End Sub </script> <p align="center"><font color="blue" size="6">Properties History</font></p> <form> <p align="center"> <input type="button" name="TestB" value="Click me to know length"></p> <div align="center">Хостинг от <a href="http://www.ucoz.ru/" title="Создать сайт бесплатно">uCoz</a><br /></div> </body> </html>

Помимо свойства Length для объекта History определены также следующие методы.

Back. Данный метод позволяет вернуться на n элементов назад. Формат вызова метода имеет следующий вид:
Window.Back n

Forward.Данный метод позволяет переместиться на n элементов вперед. Формат вызова метода имеет следующий вид:
Window.Forward n

Go.Метод реализует переход на элемент, заданный его порядковым номером. Метод имеет следующий вид:
Window.Forward.Go n
где n - порядковый номер элемента, на который требуется осуществить переход.

Методы Back и Forward сходны с одноименными кнопками в окне броузера, осуществляющими переход на один документ назад и вперед соответственно.

Расмотрим в качестве примера страницу, состоящую из двух фреймов. Верхний фрейм должен реализовать простейшие переходы на один документ вперед или на один документ назад. В листинге 2 приведен текст HTML - кода этой странички (листинг 3 описывает HTML - код документа из верхнего фрейма, а листинг 4 - из нижнего).

При нажатии на кнопку New Web-Page появляется окно свойства Prompt объекта Window. Внем следует указать новый URL документа. запрашиваемые страницы загружаются в нижний фрейм.

Листинг 2. HTML - код документа <html> <head> <title>Example</title> </head> <frameset rows="25%,75%"> <frame name="TopFrame" src=FrameControl.html> <frame name="BottomFrame" src=FrameWindow.html> </frameset> <html>

Листинг 3. HTML - код документа FrameControl.html <html> <head> <title>Example</title> </head> <body bgcolor="white"> <script language="VBScript"> Sub NewB_OnClick Str = Prompt("Введите URL", "Timer.html") If Str <> Empty then Top.BottomFrame.Location.Href = Str End If End Sub Sub ForwardB_OnClick Top.BottomFrame.History.Forward 1 End Sub Sub BackB_OnClick Top.BottomFrame.History.Back 1 End Sub </script> <p align="center"><font color="blue" size="4">Top Frame</font></p> <form> <p align="center"> <input type="button" name="NewB" value="Web - Page "></p> <p align="center"> <input type="button" name="BackB" value="Go BackB"> <input type="button" name="ForwardB" value="Go ForwardB"></p> <div align="center">Хостинг от <a href="http://www.ucoz.ru/" title="Создать сайт бесплатно">uCoz</a><br /></div> </body> </html>

Листинг 4. HTML - код документа FrameWindow.html <html> <head> <title>Example</title> </head> <body bgcolor="white"> <p align="center"><font color="blue" size="4">Bottom Frame</font></p> <div align="center">Хостинг от <a href="http://www.ucoz.ru/" title="Создать сайт бесплатно">uCoz</a><br /></div> </body> </html>

Хостинг от uCoz